home *** CD-ROM | disk | FTP | other *** search
/ Delphi 2.0 - Programmer's Utilities Power Pack / Delphi 2.0 Programmer's Utilities Power Pack.iso / m_to_r / picdll / dllunit.pas < prev    next >
Encoding:
Pascal/Delphi Source File  |  1996-09-15  |  1.1 KB  |  38 lines
  1. unit Dllunit;
  2.  
  3. { Program copyright (c) 1995 by Charles Calvert }
  4. { Project Name: RUNDLL }
  5.  
  6. interface
  7.  
  8. uses
  9.   WinTypes;
  10.  
  11.  
  12. procedure ShowPictures(Handle: THandle);
  13. procedure ShowSquares(Handle: THandle);
  14. procedure ShowFerns(Handle: THandle);
  15. function About(Dialog: HWnd; Message, WParam: Word; LParam: Longint): Bool;
  16. procedure HandleButton(Window: HWnd); 
  17. procedure ShowAbout(Window: Hwnd); 
  18. procedure RegisterWinPopup; 
  19. procedure CreateWinPopup; 
  20. function RegisterChild(ParentWindow: HWnd): HWnd; 
  21. function CreateChild(ParentWindow: HWnd): Hwnd; 
  22.  
  23. implementation
  24.  
  25. procedure ShowPictures; external 'FRACTDLL' index 1;
  26. procedure ShowSquares; external 'FRACTDLL' index 2;
  27. procedure ShowFerns; external 'FRACTDLL' index 3;
  28.  
  29. function About; external 'APIDLL' index 1;
  30. procedure HandleButton; external 'APIDLL' index 2;
  31. procedure ShowAbout; external 'APIDLL' index 3;
  32. procedure RegisterWinPopup; external 'APIDLL' index 4;
  33. procedure CreateWinPopup; external 'APIDLL' index 5;
  34. function RegisterChild; external 'APIDLL' index 6;
  35. function CreateChild; external 'APIDLL' index 7;
  36.  
  37. end.
  38.